home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 90 / CD Actual 90.iso / Software3D / VirtualLight / VLight1.3win32.exe / Examples / Level1 / PolynomSurf.vib < prev    next >
Encoding:
Text File  |  2002-10-07  |  624 b   |  24 lines

  1. // VirtuaLight VIB-Structure
  2.  
  3. ReadArchive "defshaders.vs"
  4.  
  5. Camera [ (-2.5,1.5,-3),(0,0,0),(0,1,0) FieldOfView 45 Format(320, 240) FrameAspectRatio 4/3 ]
  6.  
  7. Background '.098039, .098039, .392157'*0.9
  8.  
  9. PointLight [ (-50,50, -50) Intensity i ]
  10. PointLight [ (55,40, -40) Intensity i ]
  11. PointLight [ (-20,40, 55) Intensity i/4 LightingAttributes SPECULAR ]
  12.  
  13. static a = 1.1
  14. static b = 1.5
  15.  
  16. Shape [
  17.  PolynomialSurface (z^2*x^2-z^4-2*z*x^2+2*z^3+x^2-z^2-(x^2-z)^2-y^4-2*x^2*y^2-y^2*z^2+2*y^2*z+y^2)
  18.  Bound((-1.5,-1.5,-1.5), (1.5,1.5,1.5))
  19.  VietaSolver
  20.  primitive
  21. ]
  22.  
  23. Shape [ Disk((0,-1,0), (0,1,0), 500) ground ]
  24.